
UAN 2 9 1960 

FIELD NOTE A WORKING PAPER 



The views, conclusions, and recommendations expressed 
herein do not necessarily reflect the official views or poli- 
cies of either the Air Force or the System Development 
Corporation. 
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Although this working paper contains no classified infor- 
mation it has not been cleared for open publication by the 
Department of Defense. Open publication, wholly or in 

£art. is prohibited without prior approval of the System 
levelopment Corporation. 



(Prodnced under System Development Corporation sub- 
contract No, 202 issued by International Electric 
Corporation in performance of contract AF-30(635)-ll583} 
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PROGRAM DESIGN SPEGIFIGATIGN FOR 
THE ASSEIi'BLE BABY COMPOOL PROGRA!»I (JABCZ) 
A SUB-PR0GRAI4 OF THE JOVIAL B^TERPRETER SYSTEM 



Il-JTRODUGTION 



The Assemble Baby Goiapool Propram ( ,UT^r.?.-) ■,• o ^^^., ^„+_ ,„^^ .„, 

a Baby Gompool which contains definitions of data if, and only if the data 

creS ff{rer4t^to':/°'^' P-?-- -der test/ The BabJ Go^ool if' 
created in an efxort to elunmate manipulation of data not required for the 
bv fS%°f *^^ Pf ticular program and to provide a control medij^ for use 
by the Data c>imulation ^nd Data Processing Programs. 

produced bJ\\enL:t°TL^^4%^"ireS°?^ 

^^^^^^'Vft' :^'t ^"^--St^^L^^^ige^^bie?:: r^^-^ 

tatuo u>7itch Table. The data definitions are taken from the ^sorted 

Zltlt 11"^'''°" l^l}'' "^^ Interpreter First Pass supplemSts the 
Variable Definition Table with a defining source, wl^ich may be either the 
Master Gompool or the progra.1 under test„ If both define the v^iableth p. 
the prograr. definition overrides the Master Gompool. The InterSSte* 
vSf: '1iis'^tS'^^^°^''1 to determine the^etlusS^t^atSTel h 

t^jSe^meSaLl, n^^ag: SSfLVstatlStch^rbl ''''^'^- f "^^^^' 
-,m ^ ^ , , . " e,^ iciuxtj cina Dx,atus binO-tch iables are examined and 

all referenced statuses of status-type items are retained in thfJaby Gompool. 

_ /^®'!* *^^1® ^"^ parameter definitions in the Baby Gompool are 

intermixed and arranged alphabetically by tag. The newly-LnstructefBabv 

I'rSSS "it iTi:n 'T^' '/^' '" '°" '"^^^^ ^^^ ^^ ^^^ Data ProcessSf 
irogram. It is also retained m core storage for immediate use by the 

"CoS^GTL''s:t witTtte*'^' °P-/^- next. Tl.e communication SgisLr 
Gompool. °^ "'"''^^ ^^ *^^ ^°^^ ^^^^^^ °^ the Baby 
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EWmONI'ENT 

The follovTing environment is used to produce the Baby Gompool 
(see Output Section, below). Items not used by JAECZ are not considered 
as part of the environment. 

Tables (Sot by Interpreter - First Pass) 

1. VAT — Variable Definition Table - four-word entries 

VTAG Left-.iustified "ollerith-coded tag 

VTIPE Type of variable 

= -undefined 

1 = item 

2 = table 

3 = parameter item 

VCODE Coding of variable: 

= Status (ST) 

1 = Floating Point (FP) 

2 = Fixed Integer (FI) 

3 = Six-bit Hollerith (BH) 
5 = Itlxed Fraction (MX) 

VLEKT Number of blocks in table or, 

relative position in STAT table of first status value 
for this item (VCODE = ST) 

VFIX = fixed length table 

1 = variable leigth table 

WEl-lT Number of words in each block of the table 
(maxim\3m if VFIX = variable) or. 

Relative position of VAT entry for table containing 
this item. The relative position of the first data 
word is zero. 

VPRO IJumber of the procedure for which this variable is 

defined. (Procedure number = if defined for whole program.) 

VPAR Binary value of paraTieter item 
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VSIGN Signed/unsigned indicator if item VCODE = FI, m or FP 

= unsigned 

1 = signed 

VDEF Definition source: 

1 = program-defined 

2 = Master Compool-def ined 

3 = Master Compool definition nverT'iH<=.n K^r r,^.^.,^,^,,, j„^4„..x^-.- 

VEIGHT Number of bits to the right of binary point if VCODE = Ifi 

TOUM Number of bits including sign if VCODE = FI, MX or FP 
Number of bits if VCODE = BH (multiple of six) 
Number of statuses if VCODE = ST 

VLOC Absolute address of table control word 

Absolute address of item with zero subscript 

VU3E A set-used item added to this table by JABCZ for its 
own convenience o 

1 = item set by JOVIAL program under test 

2 = item used by JOVIAL program under test 

3 - item set and used by JOVIAL program 

2. SW - Switch Table - two-word entries 

SWST Status in Hollerith; left-justified 
"• "-*- - Status Table - one -word entries. Items VNENT and VNUM 
for status-coded items refer to this table. 
SmUE Status value of status item (6-bit Hollerith left- justified) . 
^* ^--^ Intermediate Lan guage Table - five-word entries 
OPERI Operator showing function of entry 
LGLA3 Class of left term 
LRELS Nuiiiber of statuses in switch table iSlIY) (OP'SuI = i;?). 

LuELV Relative location of initial entry for this switch in 
switch table (SWT) (OPSI = hi) 

Absolute location of VAT entry describing the left term 
variable. 
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RRELV Absolute location of VAT entry describing the right 
term variable 

RGLiiS Glass of right term 

ilFORJ'I Form of riglit terra 

5. SQIITT Sorting Table 

Each non-procedure entry in the Variable Definition Table 
{^<^kT) is represented as an absolute address in the 30RTT 
Table. 

Gonimunication Registers 



BILT 

BS^vT 

BSTAT 

BVAT 



The address portion only is used. It is set by Interpreter 
i^irst Pass (JALLZ) and contains the address o/the Inter- 
Kediate Lan^guage Table. 

Address of the Status Switch Table (see BILT, above) 

Address of the Status Table (see BILT, above) 

Address of the Variable Definition Table (see BILT, above) 



IL\TTBL+2 Address portion is set by Interpreter First Pass ( JALLZ) 
and contains the future address of the VAT Table as it 
occurs in the environment of the Interpreter Second Pass (JOLLZ). 

IlA.TTBL+3 Future address of the Status Switch Table (see MATTBL+2, above). 
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BIPUT 



^i.wiv. .^ e iiv^ v^„»iituuxo j.npauo t;o tne nsseiaoie j^aoy uompool r'rofTram. 
It is assembled from existing tables (see Environment Section). 



1. Transfer, in alphabetical order, the data definitions of all non-procedure 
variables in the Variable Definition Table (VAT) to DTAB Table of ' the 
Baby Gonipool, 

2. Use the Intermediate Lanp-narf^ Tabi^ fTi.T"! -,nr^ +v>o q+^+,,r, 0,^+-^^- T^si-m - j-- 
obtain all statuses of status-type iteras referred to by the JOVIAL Program. 

3. Store these statuses in STAB Table of the Baby GoKnool and supply the 
number and location of statuses for 2ach appropriate status itera entry in 
BTAB Table . 

h. Interrogate the Intermediate Language Table to determine the set-used 
status of each variable. 

5c Set "GO:iiL"-]G" Td.th the nwaber of words and current location of the Baby 
Gompool, "^ 

6. Store the Baby Gompool, Tables DTAB and STAR, nn +,anf:> r.i fr.r^ f,i+„^^ „„^ 
by the Data Processing Program. No end-of-file is x.Titten. 

7. Make no legality checks. 

8. Gommunication registers are used to obtain current and future addresses 
of Tables VAT, ILT, a.T and STAT. These addresses are used to compute 
the conversion factor ^ich is added to those absolute addresses in the 
Intermediate Language Table which reference either the VAT or SOT Tables. 

9. Sort the addresses in SORTT Table indirectly on the corresDonding variable 
tags in the VAT Table. ' ^ 
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OUTPUT 



Gore 



Two tables are left in core as output of the Assemble Baby Corapool 
Program. They are subsequently used by J3TIIZ, the Data Simulation 
Propram. These two tables, DTAB and STAB make up the Baby Compool. 
The DTAB Table contains a control word and a series of three-word 
entries. Each entry contains the definition of a table, item, or 
parameter tag which is used by the JOVIAL Program durin^r testing. 
These entries are arranged alphabetically according to the sjonbolic 
tags (see diagram 1 ). The status -coded items represent the 
single case where the three-word entry is not large enou^^h to contain 
the complete definition. The complete definition includes a list 
of all possible statuses assigned to the item; 3.g., the item 
MUTO (make of auto) could take on any one of the following statuses: 
FOdi), DODGE, CHiV, DESOTO, PLY. It is clear that the number of 
statuses and status items may vary greatly. This necessitates a 
/ariable Length Table with variable length entries. This table is 
known as Sx .B, the Status Table. Each entry in the table contains 
all the statuses, one per register, for a particular item. The 
entry's location and length are given in the two items ADDSTA and 
KSTATI, t*iich are part of the definition of the corresponding 
item (see Diagram 2). 

Tape 

The two Baby Compool Tables are also stored on buffer tape for future 

use by the Data Processing Program, JDSYZ. The two tables are written 

as one record and are preceded by a two-word Ident record. The two 
records are not terminated by an end-of-file record. 

Format of Ident Record 



JABCZgf 



Number of words in Baby Goranool Racord 



Formr-t of Raby nor'-Dool ''ncord 



Control word of DTAB Table 




Control word of STAB Table 



Status entries 



I u^-V---''V --■' V----V.--.. . 'x..--"V..— '^'- 



V-'l, 



,1 
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Gommtinication Register 



The length and location of the Baby Gompool Tables are stored in the 
decrement and address portions of the coramunication register, GOI'IREG 
Only the starting location of the DTAB Table is entered in COMilEG 
since the two Baby Gorapool Tables follow one another. 
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Diagran 1 - DTAB Table Fon-nat 



Control word contains: 

NENT: number of entries in DTAB Table 

Fv,Tl3: number of words in DTAR Table including the control word 



NEWT 



mms 



GOMTAG (Table) 



TAG TAB SET VM 
TTP TTP TTSF. DKF 



vroSTRY 



NSNTHY 



ABSADD 



]0?ITAG (Item) 



TAG SIG SET ^/.\R 
TYP HEP USE i)EF 



IT CODE 



?NTP03 
ADDSTA 



HBITS 
N3TATT 



TABREF 



ABSADD 



TAG SIG SET VM 
TYP VF.U TTSE n^F 



]0I1TAG 'Value) 
'J- 



ITCODE 



PNTP03 



NBIT^ 



7AU E 



GOiiRESPONDING 
VAT TABLE 



TAG 

CQMTAG 
TAGTYP 
TABTYP 
SIGNED 
3ETUSE 
VMDEF 



VfflSTRY 
NEJJTRY 
ABSADD 

PHTPOS 

ADDSTA 

NBITS 

NSTATI 

ITCODE 

VALUE 

TABREF 



TAG 

VTAG 

VTYI^E 

VFIX 

ySIGN 

TOSE 

VDEF 



VLENT 
VMENT 
VLOG 

raiGHT 

VLENT 

VWM 

VNUM 

VCODE 

VPAR 

VNENT 



0-35 

0,1 

2 

2 

3,U 
5,6 



7-17 

18-35 

18-35 

18-29 

18-29 

30-35 
30-35 
lli-17 
0-35 

0-17 



DEFEvIITION 

Hollerith tag left- justified. 

= Item; 1 = Table j 2 = Value. 

= Fixed length; 1 = Variable length. 

= Unsigned item; 1 = Signed item. 

= Null; 1 = Set; 2 = Used; 3 = Both- 

1 = Variable defined by the program. 

2 = Variable defined by the Master Gorapool 

3 = Master Gorapool definition overriden by program. 
Number of blocks in this table. 

Number of words per block. 

Absolute address of table control word, or absolute address 

of table block containing this item. 
Mixed fractions e The number of bits to the right of the 

binary point. 
Relative address in STAB Table of the block of registers 

containing the legal statuses used by this program. 
Number of bits in item including the sign bit. 
Number of statuses for status-coded items. 
The item coding: 0=ST: 1=FP; 2=FI; 3=BH; 5=I-:X. 
The constant describee by '".his value entry. 
Relative position of DTAB Entry for table containing this 
item. The control vrord is relative position zero. 
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Ciagram 2 - STAB Table Format 
Control vjord contains: 

I-ENT: number of statuses 

fft».T3S: number of words Including control word 



NENT 




Statuses are Hollerith-coded and left- justified. Each status may 
contain a raaximuni of six alphanumeric characters. ' 

From the above illustration it follows that for status item MUTO 
we have: 



ADDSTA = I; 
N3TATI = 5 




CrCLE. VAT TAauF. 
am; STQRt /ADDRESSES 
OF NON- PKOCEDORE. 
VARIABCES INTO "HIE 
&ORTT TASt-E. 



6R0AD 



P! AS 



Compute, and j 

WORD OF pTAB j. 
TABLE. 



^ 



)\mm or jaicz 



-e" 



CLEAR CqR& area 
RECUlRED FOR 
CURf?eNT DTftB 
TABLE. 
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-^ 



SORT THE SORTT 
TABLE ItHDIHECTLr 
OH THE NON- 

^oce.D(;»=ie tass in 

THE VAT T^6t-E- 



Aorsf.s^-E." cj-.rcN j 

ADD«£StSCO OP /AT I 
A^4D SWT. I 



-^ 



CYCi-e XL.T AND 
CHgCK aACM ENTRY 
FOR TYPE OF 



7sr~s: 



3 LEFr TEKm 19 a. 

CARiAftLE. .rj^' ' 
To Str 



le: I. oPEBi. =» l,Z,23l 
2. R16MT TEftn 

Co»-fTMMS STATUS 
TVltM: SroKt STATUS 

/N :i"fAr TAtLE. 



TBANSFEf=^ VAT 
TABLE DEFINITIONS 
-^ IN AuP'Mf^&e.TlCAL ^ 
ORce.R To OTf\S> i 
TABLE. 



If; I. oreRx^i-iOjas, 

ft 

^- LEFT TERM «S 

v'AF^i able- 
then; SET "\A;^"tO 



if; CX^ERt : 47 
Wew: ThAtfaFER TVie. 

5wT TAtJLt To 



-^ 



SET Control 

VV/OP>0 OF 
STAB TABLE 



„-Y 



IP- RI6HT TERM IS 

A VAftlABLt 
THEii: ie.r'Mxn^" 

TO SET. 



5T0R£ l£MStH of 
ConPOOL US XDEflT 

8CC0RO iriASe. And ijs 

'/» COMMAND uWlCH !^ 
wniTTES THE. COMPOBLj 
ON TftPR. i 



-^ 



OF COFiR^^T tfAesy 



^^ 



W-^ITE. Cor'r'ooL 
rpENT hECrAQ /.fr 
COI^POOU RtiJoi^D 



KETTUBN CCNTkOU ! 

ro TCP I 

i 

} 

i 
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A listing of the program symbolic 
deck vill be issued as the first supplement 
to this document (FN-LO-202, S-l). 
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B. Morriss 
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